*Change the file path to your directory"
*Use FigureS8.dta in order to generate Figure S8: Credibility by Gender

use "/FigureS8.dta"

*Generate the bar graph
twoway (bar mean fixgraph if gender ==1 & fixgraph>2) (bar mean fixgraph if gender ==2 & fixgraph>2)(rcap high low fixgraph if fixgraph>2), legend (row(1) order(1 "Male" 2 "Female" )) xlabel(4.5 "Original" 7.5 "AI" 10.5 "Disclaimer AI") xtitle("Generator") ylabel(0(.2)1) graphregion(color(white))
